﻿Imports System.Diagnostics.Contracts

Namespace FTTK.Exceptions
    ''' <summary>
    ''' Defines base object for Exceptions
    ''' </summary>
    ''' <remarks></remarks>
    Public Class FotoliaException
        Inherits Exception


        Public Sub New(message As String)
            MyBase.New(message)
        End Sub

        Public Sub New()
            MyBase.New()
        End Sub

        Public Sub New(message As String, innerException As System.Exception)
            MyBase.New(message, innerException)
        End Sub


        ''' <summary>
        ''' Exception code.
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property Code As String

    End Class
End Namespace
